(Info-follow-reference): Allow multiline reference name.

diff --git a/lisp/info.el b/lisp/info.el
index 4a05da999d4421089f611b494a4327f6bd7a4aae..34ec499d542fa47f26d78c8306fac3718555069e 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1840,7 +1840,8 @@ new buffer."
           (if (and (save-excursion
                      (goto-char (+ (point) 5)) ; skip a possible *note
                      (re-search-backward "\\*note[ \n\t]+" nil t)
-                     (looking-at (concat "\\*note[ \n\t]+" (Info-following-node-name-re))))
+                     (looking-at (concat "\\*note[ \n\t]+"
+                                         (Info-following-node-name-re "^.,\t"))))
                    (<= (point) (match-end 0)))
               (goto-char (match-beginning 0))))
       ;; Go to the reference closest to point